home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
BBS in a Box 5
/
BBS in a Box -Volume V (BBS in a Box) (April 1992).iso
/
AMUG Info
/
User Groups
/
User Groups
/
background_2642.txt
< prev
next >
Wrap
Text File
|
1991-02-15
|
7KB
|
353 lines
-- background: 2642 from stack: in
-- bmap block id: 3147
-- flags: 0000
-- background id: 0
-- name:
----- HyperTalk script -----
on openBackground
push recent card
end openBackground
-- part 3 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=227 top=317 right=342 bottom=254
-- title width / last selected line: 0
-- icon id / first selected line: 1014 / 1014
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Prev
----- HyperTalk script -----
on mouseUp
go prev card
end mouseUp
-- part 4 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=261 top=317 right=342 bottom=288
-- title width / last selected line: 0
-- icon id / first selected line: 1013 / 1013
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Next
----- HyperTalk script -----
on mouseUp
go next card
end mouseUp
-- part 5 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=13 top=321 right=339 bottom=39
-- title width / last selected line: 0
-- icon id / first selected line: 20689 / 20689
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Home
----- HyperTalk script -----
on mouseUp
visual effect iris open
go Home
end mouseUp
-- part 6 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=463 top=317 right=341 bottom=500
-- title width / last selected line: 0
-- icon id / first selected line: 1012 / 1012
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Return
----- HyperTalk script -----
on mouseUp
visual effect iris close
pop card
end mouseUp
-- part 8 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=54 top=58 right=83 bottom=450
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 34
-- text size: 18
-- style flags: 256
-- line height: 24
-- part name: Group Name
-- part 9 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=74 top=90 right=114 bottom=433
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 34
-- text size: 14
-- style flags: 256
-- line height: 18
-- part name: Alternate Name
-- part 10 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=58 top=117 right=135 bottom=446
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 34
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Affiliation
-- part 11 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=59 top=137 right=157 bottom=249
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 34
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Product Code
-- part 12 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=250 top=137 right=157 bottom=446
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 34
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Group Code
-- part 13 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=58 top=160 right=181 bottom=448
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 34
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Address 1
-- part 14 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=58 top=183 right=204 bottom=448
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 34
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Address 2
-- part 15 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=89 top=205 right=225 bottom=239
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 65535
-- font id: 34
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: City
-- part 16 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=241 top=205 right=224 bottom=275
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 34
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: State
-- part 17 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=276 top=205 right=224 bottom=342
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 34
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 99999
-- part 18 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=343 top=205 right=224 bottom=448
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 34
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Country
-- part 19 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=442 top=50 right=73 bottom=466
-- title width / last selected line: 0
-- icon id / first selected line: 10851 / 10851
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: About
----- HyperTalk script -----
on mouseUp
answer "UG Stack by Don Rose - 4/90 for GEM•CD/Mac"
end mouseUp
-- part 21 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=120 top=299 right=317 bottom=159
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 3
-- text size: 9
-- style flags: 256
-- line height: 12
-- part name: Sort
----- HyperTalk script -----
on mouseUp
answer "Sort by:" with "Group Name" or "Zip" or "Cancel"
if it is "Group Name"
then sort by first word of first line of field 1
else if it is "Zip"
then sort by first word of first line of field 10
end mouseUp
-- part 22 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=346 top=299 right=316 bottom=385
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: View
----- HyperTalk script -----
on mouseUp
show all cards
end mouseUp
-- part 23 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=390 top=298 right=316 bottom=428
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Find
----- HyperTalk script -----
on mouseUp
ask "Find who or what?"
Put it into FMe
if FMe is empty then
exit mouseUp
else
put the loc of msg into remember
set loc of msg to 33000,33000
put "Find " & quote & FMe & quote into msg
do msg
hide msg
set loc of msg to remember
end if
end mouseUp
-- part 24 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=71 top=299 right=317 bottom=110
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 3
-- text size: 9
-- style flags: 256
-- line height: 12
-- part name: Sort
----- HyperTalk script -----
on mouseUp
go first card
end mouseUp